﻿var cld;
var Today = new Date();
var tY = Today.getFullYear();
var tM = Today.getMonth();
var tD = Today.getDate();
var currentYear = tY;
var currentMonth = tM;;
var currentDay = tD;

var width = "130";
var offsetx = 2;
var offsety = 8;

var x = 0;
var y = 0;
var snow = 0;
var sw = 0;
var cnt = 0;

var dStyle;
//document.onmousemove = mEvn;

var ttime = 0;
// 1900-2049
/*
xxxx 	xxxx 	xxxx 	xxxx 	xxxx
20-17 	16-12 	12-9 	8-5 	4-1
1-4: 表示当年有无闰年，有的话，为闰月的月份，没有的话，为0。
5-16：为除了闰月外的正常月份是大月还是小月，1为30天，0为29天。
注意：从1月到12月对应的是第16位到第5位。
17-20： 表示闰月是大月还是小月，仅当存在闰月的情况下有意义。

1980年的数据是： 0x095b0
二进制：0000    1001 0101 1011 0000
表示1980年没有闰月，从1月到12月的天数依次为：30、29、29、30、29、30、29、30、30、29、30、30。
1982年的数据是：0x0a974
0000 1010 1010 0111 0100
表示1982年的4月为闰月，即有第二个4月，且是闰小月。
从1月到13月的天数依次为：30、29、30、29、29(闰月)、30、29、30、29、29、30、30、30。
*/
var tInfo = new Array(
        0x04bd8, 0x04ae0, 0x0a570, 0x054d5, 0x0d260, 0x0d950, 0x16554, 0x056a0, 0x09ad0, 0x055d2,
        0x04ae0, 0x0a5b6, 0x0a4d0, 0x0d250, 0x1d255, 0x0b540, 0x0d6a0, 0x0ada2, 0x095b0, 0x14977,
        0x04970, 0x0a4b0, 0x0b4b5, 0x06a50, 0x06d40, 0x1ab54, 0x02b60, 0x09570, 0x052f2, 0x04970,
        0x06566, 0x0d4a0, 0x0ea50, 0x06e95, 0x05ad0, 0x02b60, 0x186e3, 0x092e0, 0x1c8d7, 0x0c950,
        0x0d4a0, 0x1d8a6, 0x0b550, 0x056a0, 0x1a5b4, 0x025d0, 0x092d0, 0x0d2b2, 0x0a950, 0x0b557,
        0x06ca0, 0x0b550, 0x15355, 0x04da0, 0x0a5b0, 0x14573, 0x052b0, 0x0a9a8, 0x0e950, 0x06aa0,
        0x0aea6, 0x0ab50, 0x04b60, 0x0aae4, 0x0a570, 0x05260, 0x0f263, 0x0d950, 0x05b57, 0x056a0,
        0x096d0, 0x04dd5, 0x04ad0, 0x0a4d0, 0x0d4d4, 0x0d250, 0x0d558, 0x0b540, 0x0b6a0, 0x195a6,
        0x095b0, 0x049b0, 0x0a974, 0x0a4b0, 0x0b27a, 0x06a50, 0x06d40, 0x0af46, 0x0ab60, 0x09570,
        0x04af5, 0x04970, 0x064b0, 0x074a3, 0x0ea50, 0x06b58, 0x055c0, 0x0ab60, 0x096d5, 0x092e0,
        0x0c960, 0x0d954, 0x0d4a0, 0x0da50, 0x07552, 0x056a0, 0x0abb7, 0x025d0, 0x092d0, 0x0cab5,
        0x0a950, 0x0b4a0, 0x0baa4, 0x0ad50, 0x055d9, 0x04ba0, 0x0a5b0, 0x15176, 0x052b0, 0x0a930,
        0x07954, 0x06aa0, 0x0ad50, 0x05b52, 0x04b60, 0x0a6e6, 0x0a4e0, 0x0d260, 0x0ea65, 0x0d530,
        0x05aa0, 0x076a3, 0x096d0, 0x04bd7, 0x04ad0, 0x0a4d0, 0x1d0b6, 0x0d250, 0x0d520, 0x0dd45,
        0x0b5a0, 0x056d0, 0x055b2, 0x049b0, 0x0a577, 0x0a4b0, 0x0aa50, 0x1b255, 0x06d20, 0x0ada0,
        0x14b63);

var solarMonth = new Array(31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);
var Gan = new Array("甲", "乙", "丙", "丁", "戊", "己", "庚", "辛", "壬", "癸");
var Zhi = new Array("子", "丑", "寅", "卯", "辰", "巳", "午", "未", "申", "酉", "戌", "亥");
var Animals = new Array("鼠", "牛", "虎", "兔", "龙", "蛇", "马", "羊", "猴", "鸡", "狗", "猪");
var solarTerm = new Array("小寒", "大寒", "立春", "雨水", "惊蛰", "春分", "清明", "谷雨", "立夏", "小满", "芒种", "夏至", "小暑", "大暑", "立秋", "处暑", "白露", "秋分", "寒露", "霜降", "立冬", "小雪", "大雪", "冬至");
var sTermInfo = new Array(0, 21208, 42467, 63836, 85337, 107014, 128867, 150921, 173149, 195551, 218072, 240693, 263343, 285989, 308563, 331033, 353350, 375494, 397447, 419210, 440795, 462224, 483532, 504758);
var nStr1 = new Array("日", "一", "二", "三", "四", "五", "六", "七", "八", "九", "十");
var nStr2 = new Array("初", "十", "廿", "卅", "□");
var monthName = new Array("一月", "二月", "三月", "四月", "五月", "六月", "七月", "八月", "九月", "十月", "十一月", "十二月");
var dayOfWeek = ["日", "一", "二", "三", "四", "五", "六"];

//国历节日 *表示放假日
var sFtv = new Array(
        "0101*元旦",
        "0214 情人节",
        "0308 妇女节",
        "0312 植树节",
        "0401 愚人节",
        "0501*劳动节",
        "0504 青年节",
        "0701 建党节",
        "0801 建军节",
        "0910 教师节",
        "1001*国庆节",
        "1224 平安夜",
        "1225 圣诞节");

//农历节日 *表示放假日
var lFtv = new Array(
        "0101*春节",
        "0115 元宵节",
        "0505*端午节",
        "0707 七夕",
        "0715 中元节",
        "0815*中秋节",
        "0909 重阳节",
        "1208 腊八节",
        "1223 小年",
        "0100*除夕");

//某月的第几个星期几
var wFtv = new Array( //一月的最后一个星期日（月倒数第一个星期日）
        "0520 国际母亲节",
        "0630 父亲节",
        "1144 感恩节");

var y2013Holiday = [
        //"20130101*元旦",
        "20130102*元旦假日",
        "20130103*元旦假日",
        //"20130209*除夕",
        //"20130210*春节",
        "20130211*春节假日",
        "20130212*春节假日",
        "20130213*春节假日",
        "20130214*春节假日",
        "20130215*春节假日",
        //"20130404*清明",
        "20130405*清明假日",
        "20130406*清明假日",
        "20130429*劳动节假日",
        "20130430*劳动节假日",
        //"20130501*劳动节",
        "20130610*端午节假日",
        "20130611*端午节假日",
        //"20130612*端午节",
        //"20130919*中秋节",
        "20130920*中秋节假日",
        "20130921*中秋节假日",
        //"20131001*国庆节",
        "20131002*国庆节假日",
        "20131003*国庆节假日",
        "20131004*国庆节假日",
        "20131005*国庆节假日",
        "20131006*国庆节假日",
        "20131007*国庆节假日",
];

/*****************************************************************************
日期计算
*****************************************************************************/
//====================================== 返回农历 y年的总天数
function lYearDays(y) {
    var i, sum = 348;
    for (i = 0x8000; i > 0x8; i >>= 1) sum += (tInfo[y - 1900] & i) ? 1 : 0;
    return (sum + leapDays(y));
}

//====================================== 返回农历 y年闰月的天数
function leapDays(y) {
    if (leapMonth(y)) return ((tInfo[y - 1900] & 0x10000) ? 30 : 29);
    else return (0);
}

//====================================== 返回农历 y年闰哪个月 1-12 , 没闰返回 0
function leapMonth(y) {
    return (tInfo[y - 1900] & 0xf);
}

//====================================== 返回农历 y年m月的总天数
function monthDays(y, m) {
    return ((tInfo[y - 1900] & (0x10000 >> m)) ? 30 : 29);
}

//====================================== 算出农历, 传入日期控件, 返回农历日期控件
//                                       该控件属性有 .year .month .day .isLeap
function Lunar(objDate) {

    var i, leap = 0, temp = 0;
    var offset = (Date.UTC(objDate.getFullYear(), objDate.getMonth(), objDate.getDate()) - Date.UTC(1900, 0, 31)) / 86400000;

    for (i = 1900; i < 2050 && offset > 0; i++) { temp = lYearDays(i); offset -= temp; }

    if (offset < 0) { offset += temp; i--; }

    this.year = i;

    leap = leapMonth(i); //闰哪个月
    this.isLeap = false;

    for (i = 1; i < 13 && offset > 0; i++) {
        //闰月
        if (leap > 0 && i == (leap + 1) && this.isLeap == false)
        { --i; this.isLeap = true; temp = leapDays(this.year); }
        else
        { temp = monthDays(this.year, i); }

        //解除闰月
        if (this.isLeap == true && i == (leap + 1)) this.isLeap = false;

        offset -= temp;
    }

    if (offset == 0 && leap > 0 && i == leap + 1)
        if (this.isLeap)
        { this.isLeap = false; }
        else
        { this.isLeap = true; --i; }

    if (offset < 0) { offset += temp; --i; }

    this.month = i;
    this.day = offset + 1;
}

//==============================返回公历 y年某m+1月的天数
function solarDays(y, m) {
    if (m == 1)
        return (((y % 4 == 0) && (y % 100 != 0) || (y % 400 == 0)) ? 29 : 28);
    else
        return (solarMonth[m]);
}
//============================== 传入 offset 返回干支, 0=甲子
function cyclical(num) {
    return (Gan[num % 10] + Zhi[num % 12]);
}

//============================== 阴历属性
function calElement(sYear, sMonth, sDay, week, lYear, lMonth, lDay, isLeap, cYear, cMonth, cDay) {

    this.isToday = false;
    //瓣句
    this.sYear = sYear;   //公元年4位数字
    this.sMonth = sMonth;  //公元月数字
    this.sDay = sDay;    //公元日数字
    this.week = week;    //星期, 1个中文
    //农历
    this.lYear = lYear;   //公元年4位数字
    this.lMonth = lMonth;  //农历月数字
    this.lDay = lDay;    //农历日数字
    this.isLeap = isLeap;  //是否为农历闰月?
    //八字
    this.cYear = cYear;   //年柱, 2个中文
    this.cMonth = cMonth;  //月柱, 2个中文
    this.cDay = cDay;    //日柱, 2个中文

    this.color = "";

    this.lunarFestival = ""; //农历节日
    this.solarFestival = ""; //公历节日
    this.solarTerms = ""; //节气
}

//===== 某年的第n个节气为几日(从0小寒起算)
function sTerm(y, n) {
    if (y == 2009 && n == 2) { sTermInfo[n] = 43467 }
    var offDate = new Date((31556925974.7 * (y - 1900) + sTermInfo[n] * 60000) + Date.UTC(1900, 0, 6, 2, 5));
    return (offDate.getUTCDate());
}

//============================== 返回阴历控件 (y年,m+1月)
/*
功能说明: 返回整个月的日期资料控件

使用方式: OBJ = new calendar(年,零起算月);

OBJ.length      返回当月最大日
OBJ.firstWeek   返回当月一日星期

由 OBJ[日期].属性名称 即可取得各项值

OBJ[日期].isToday  返回是否为今日 true 或 false

其他 OBJ[日期] 属性参见 calElement() 中的注解
*/
function calendar(y, m) {

    var sDObj, lDObj, lY, lM, lD = 1, lL, lX = 0, tmp1, tmp2, tmp3;
    var cY, cM, cD; //年柱,月柱,日柱
    var lDPOS = new Array(3);
    var n = 0;
    var firstLM = 0;

    sDObj = new Date(y, m, 1, 0, 0, 0, 0);    //当月一日日期

    this.length = solarDays(y, m);    //公历当月天数
    this.firstWeek = sDObj.getDay();    //公历当月1日星期几

    ////////年柱 1900年立春后为庚子年(60进制36)
    if (m < 2) cY = cyclical(y - 1900 + 36 - 1);

    else cY = cyclical(y - 1900 + 36);

    var term2 = sTerm(y, 2); //立春日期

    ////////月柱 1900年1月小寒以前为 丙子月(60进制12)
    var firstNode = sTerm(y, m * 2) //返回当月「节」为几日开始
    cM = cyclical((y - 1900) * 12 + m + 12);

    //当月一日与 1900/1/1 相差天数
    //1900/1/1与 1970/1/1 相差25567日, 1900/1/1 日柱为甲戌日(60进制10)
    var dayCyclical = Date.UTC(y, m, 1, 0, 0, 0, 0) / 86400000 + 25567 + 10;

    for (var i = 0; i < this.length; i++) {

        if (lD > lX) {
            sDObj = new Date(y, m, i + 1);    //当月一日日期
            lDObj = new Lunar(sDObj);     //农历
            lY = lDObj.year;           //农历年
            lM = lDObj.month;          //农历月
            lD = lDObj.day;            //农历日
            lL = lDObj.isLeap;         //农历是否闰月
            lX = lL ? leapDays(lY) : monthDays(lY, lM); //农历当月最后一天

            if (n == 0) firstLM = lM;
            lDPOS[n++] = i - lD + 1;
        }

        //依节气调整二月分的年柱, 以立春为界
        /*
        //PM提出线上2月3日，初一不是庚寅年，应该是辛卯年。
        by yuji
        
        这里firstNode是指农历每月的节气所在的日期，用这个标志判断
        农历每月起始日天干地支是错误的，应当用每月的农历初一所在日确定
        下月的天干地支。农历每月初一都要重新计算一下天干地支。
        */
        if (m == 1 && ((i + 1) == term2 || lD == 1)) cY = cyclical(y - 1900 + 36);

        //依节气月柱, 以「节」为界
        //if((i+1)==firstNode) cM = cyclical((y-1900)*12+m+13);

        /*
        by yuji
        
        这里firstNode是指农历每月的节气所在的日期，用这个标志判断
        农历每月起始日天干地支是错误的，应当用每月的农历初一所在日确定
        下月的天干地支。农历每月初一都要重新计算一下天干地支。
        */
        if (lD == 1) {
            cM = cyclical((y - 1900) * 12 + m + 13);

        }

        //日柱
        cD = cyclical(dayCyclical + i);

        //sYear,sMonth,sDay,week,
        //lYear,lMonth,lDay,isLeap,
        //cYear,cMonth,cDay
        this[i] = new calElement(y, m + 1, i + 1, nStr1[(i + this.firstWeek) % 7],
        lY, lM, lD++, lL,
        cY, cM, cD);
    }

    //节气
    tmp1 = sTerm(y, m * 2) - 1;
    tmp2 = sTerm(y, m * 2 + 1) - 1;
    this[tmp1].solarTerms = solarTerm[m * 2];
    this[tmp2].solarTerms = solarTerm[m * 2 + 1];
    //guohao
    if (y == 2009 && m == 1) {
        if (tD == 3) {
            this[tmp1].solarTerms = ''
            //this[tmp2].solarTerms = ''
        }
        else if (tD == 4) {
            this[tmp1].solarTerms = '立春'
            //this[tmp2].solarTerms = ''
        }
    }
    if (m == 3) this[tmp1].color = 'red'; //清明颜色

    //公历节日
    for (i in sFtv)
        if (sFtv[i].match(/^(\d{2})(\d{2})([\s\*])(.+)$/))
            if (Number(RegExp.$1) == (m + 1)) {
                this[Number(RegExp.$2) - 1].solarFestival += RegExp.$4 + ' ';
                if (RegExp.$3 == '*') this[Number(RegExp.$2) - 1].color = 'red';
            }

    //月周节日
    for (i in wFtv)
        if (wFtv[i].match(/^(\d{2})(\d)(\d)([\s\*])(.+)$/))
            if (Number(RegExp.$1) == (m + 1)) {
                tmp1 = Number(RegExp.$2);
                tmp2 = Number(RegExp.$3);
                if (tmp1 < 5)
                    this[((this.firstWeek > tmp2) ? 7 : 0) + 7 * (tmp1 - 1) + tmp2 - this.firstWeek].solarFestival += RegExp.$5 + ' ';
                else {
                    tmp1 -= 5;
                    tmp3 = (this.firstWeek + this.length - 1) % 7; //当月最后一天星期?
                    this[this.length - tmp3 - 7 * tmp1 + tmp2 - (tmp2 > tmp3 ? 7 : 0) - 1].solarFestival += RegExp.$5 + ' ';
                }
            }

    //农历节日
    for (i in lFtv)
        if (lFtv[i].match(/^(\d{2})(.{2})([\s\*])(.+)$/)) {
            tmp1 = Number(RegExp.$1) - firstLM;
            if (tmp1 == -11) tmp1 = 1;
            if (tmp1 >= 0 && tmp1 < n) {
                tmp2 = lDPOS[tmp1] + Number(RegExp.$2) - 1;
                if (tmp2 >= 0 && tmp2 < this.length && this[tmp2].isLeap != true) {
                    this[tmp2].lunarFestival += RegExp.$4 + ' ';
                    if (RegExp.$3 == '*') this[tmp2].color = 'red';
                }
            }
        }

    //2013 public holiday
    for (i in y2013Holiday) {
        if (y2013Holiday[i].match(/^(.{4})(.{2})(\d{2})([\s\*])(.+)$/)) {
            if (Number(RegExp.$1) == y && Number(RegExp.$2) == (m + 1)) {
                this[Number(RegExp.$3) - 1].solarFestival += RegExp.$5 + " ";
                this[Number(RegExp.$3) - 1].color = "red";
            }
        }
    }

    //复活节只出现在3或4月
    if (m == 2 || m == 3) {
        var estDay = new easter(y);
        if (m == estDay.m)
            this[estDay.d - 1].solarFestival = this[estDay.d - 1].solarFestival + ' 复活节';
    }

    //俊武birthday
    //if (m == 8) this[8].solarFestival = this[8].solarFestival + unescape('%u4fca%u6b66%u751f%u65e5');

    //黑色星期五
    if ((this.firstWeek + 12) % 7 == 5)
        this[12].solarFestival += '黑色星期五';

    //今日
    if (y == tY && m == tM) this[tD - 1].isToday = true;
}

//======================================= 返回该年的复活节(春分后第一次满月周后的第一主日)
function easter(y) {

    var term2 = sTerm(y, 5); //取得春分日期
    var dayTerm2 = new Date(Date.UTC(y, 2, term2, 0, 0, 0, 0)); //取得春分的公历日期控件(春分一定出现在3月)
    var lDayTerm2 = new Lunar(dayTerm2); //取得取得春分农历

    if (lDayTerm2.day < 15) //取得下个月圆的相差天数
        var lMlen = 15 - lDayTerm2.day;
    else
        var lMlen = (lDayTerm2.isLeap ? leapDays(y) : monthDays(y, lDayTerm2.month)) - lDayTerm2.day + 15;

    //一天等于 1000*60*60*24 = 86400000 毫秒
    var l15 = new Date(dayTerm2.getTime() + 86400000 * lMlen); //求出第一次月圆为公历几日
    var dayEaster = new Date(l15.getTime() + 86400000 * (7 - l15.getUTCDay())); //求出下个周日

    this.m = dayEaster.getUTCMonth();
    this.d = dayEaster.getUTCDate();

}

//====================== 中文日期
function cDay(d) {
    var s;

    switch (d) {
        case 10:
            s = '初十'; break;
        case 20:
            s = '二十'; break;
            break;
        case 30:
            s = '三十'; break;
            break;
        default:
            s = nStr2[Math.floor(d / 10)];
            s += nStr1[d % 10];
    }
    return (s);
}
///////////////////////////////////////////////////////////////////////////////
function drawCld(SY, SM) {
    var i, sD, s, size, sF = '';
    cld = new calendar(SY, SM);

    //if (SY > 1874 && SY < 1909) yDisplay = '光绪' + (((SY - 1874) == 1) ? '元' : SY - 1874);
    //if (SY > 1908 && SY < 1912) yDisplay = '宣统' + (((SY - 1908) == 1) ? '元' : SY - 1908);
    //if (SY > 1911) yDisplay = '建国' + (((SY - 1949) == 1) ? '元' : SY - 1949);
    //document.getElementById("GZ").innerText = yDisplay + '年 农历 ' + cyclical(SY - 1900 + 36) + '年 【' + Animals[(SY - 4) % 12] + '年】';
    //YMBG.innerHTML = "&nbsp;" + SY + "年" + "<BR>&nbsp;" + monthName[SM];
    var yearCommonInfo = SY + "年" + (SM + 1) + "月";
    var yearLunarInfo = "农历" + cyclical(SY - 1900 + 36) + "年 【" + Animals[(SY - 4) % 12] + "年】";;
    document.getElementById("datecommon").innerText = yearCommonInfo;
    document.getElementById("datelunar").innerText = yearLunarInfo;

    for (i = 0; i < 42; i++) {

        var dayCell = document.getElementById('GD' + i);
        var sObj = document.getElementById('SD' + i);
        var lObj = document.getElementById('LD' + i);
        var fullDateFlag = document.getElementById('flag' + i);

        sD = i - cld.firstWeek;
        fullDateFlag.innerHTML = "";
        sObj.parentElement.className = "daycell";
        if (sD > -1 && sD < cld.length) { //日期内
            sObj.innerHTML = sD + 1;

            var fullMonth = SM + 1;
            if (fullMonth < 10) {
                fullMonth = "0" + fullMonth;
            }
            var fullday = sD + 1;
            if (fullday < 10) {
                fullday = "0" + fullday;
            }

            var fullDate = SY + fullMonth + fullday;
            fullDateFlag.innerHTML = "<div id=" + fullDate + ">" + fullDate + "</div>";

            if (cld[sD].isToday) {
                sObj.className = sObj.className + " todyColor"; //今日颜色
                sObj.parentElement.className = sObj.parentElement.className + " todaycell";
            }

            //sObj.style.color = cld[sD].color; //法定假日颜色
            if (cld[sD].color != "") {
                sObj.parentElement.className = sObj.parentElement.className + " publicholidaycell";
            }

            if (cld[sD].lDay == 1) //显示农历月
                lObj.innerHTML = '<b>' + (cld[sD].isLeap ? '闰' : '') + monthName[(cld[sD].lMonth - 1)] + (monthDays(cld[sD].lYear, cld[sD].lMonth) == 29 ? '小' : '大') + '</b>';
            else //显示农历日
                lObj.innerHTML = cDay(cld[sD].lDay);

            s = cld[sD].lunarFestival;//农历节日
            if (s.length > 0) {
                if (s.length > 6) {
                    //s = s.substr(0, 4) + '...';
                }
                sF += "<div class='daychinesefestival'>" + s + "</div>";
                //s = s.fontcolor('red');
            }

            s = cld[sD].solarFestival;//公历节日
            if (s.length > 0) {
                size = (s.charCodeAt(0) > 0 && s.charCodeAt(0) < 128) ? 8 : 4;
                if (s.length > size + 2) {
                    //s = s.substr(0, size) + '...';
                }
                sF += "<div class='daycommonholiday'>" + s + "</div>";
                //s = (s == '黑色星期五') ? s.fontcolor('black') : s.fontcolor('blue');
            }
            sF += "<div class='day24festival'>" + cld[sD].solarTerms + "</div>";  //廿四节气
            //if (s.length > 0) s = s.fontcolor('limegreen');

            //if (cld[sD].solarTerms == '清明') s = '清明节'.fontcolor('red');
            //if (cld[sD].solarTerms == '芒种') s = '芒种节'.fontcolor('red');
            //if (cld[sD].solarTerms == '夏至') s = '夏至节'.fontcolor('red');
            //if (cld[sD].solarTerms == '冬至') s = '冬至节'.fontcolor('red');



            if (s.length > 0 || sF.length > 0) lObj.innerHTML += sF;
            sF = '';

        }
        else {
            //非日期
            sObj.innerHTML = '';
            lObj.innerHTML = '';
        }
    }
}

function changeCld() {
    var y, m;
    y = YearList().selectedIndex + 1900;
    m = MonthList().selectedIndex;
    drawCld(y, m);
    bindCellClickEvent();
}

function pushBtm(K) {
    switch (K) {
        case 'YU':
            if (YearList().selectedIndex > 0) YearList().selectedIndex--;
            break;
        case 'YD':
            if (YearList().selectedIndex < 150) YearList().selectedIndex++;
            break;
        case 'MU':
            if (MonthList().selectedIndex > 0) {
                MonthList().selectedIndex--;
            }
            else {
                MonthList().selectedIndex = 11;
                if (YearList().selectedIndex > 0) YearList().selectedIndex--;
            }
            break;
        case 'MD':
            if (MonthList().selectedIndex < 11) {
                MonthList().selectedIndex++;
            }
            else {
                MonthList().selectedIndex = 0;
                if (YearList().selectedIndex < 150) YearList().selectedIndex++;
            }
            break;
        default:
            YearList().selectedIndex = tY - 1900;
            MonthList().selectedIndex = tM;
    }
    changeCld();
}

//显示详细日期资料
function mOvr(v) {
    var s, festival;
    var sObj = eval('SD' + v);
    var d = sObj.innerHTML - 1;

    //sYear,sMonth,sDay,week,
    //lYear,lMonth,lDay,isLeap,
    //cYear,cMonth,cDay

    if (sObj.innerHTML != '') {

        sObj.style.cursor = 's-resize';

        if (cld[d].solarTerms == '' && cld[d].solarFestival == '' && cld[d].lunarFestival == '')
            festival = '';
        else
            festival = '<TABLE WIDTH=100% BORDER=0 CELLPADDING=2 CELLSPACING=0 BGCOLOR="#CCFFCC"><TR><TD>' +
            '<FONT COLOR="#000000" STYLE="font-size:9pt;">' + cld[d].solarTerms + ' ' + cld[d].solarFestival + ' ' + cld[d].lunarFestival + '</FONT></TD>' +
            '</TR></TABLE>';

        s = '<TABLE WIDTH="130" BORDER=0 CELLPADDING="2" CELLSPACING=0 BGCOLOR="#000066" style="filter:Alpha(opacity=80)"><TR><TD>' +
        '<TABLE WIDTH=100% BORDER=0 CELLPADDING=0 CELLSPACING=0><TR><TD ALIGN="right"><FONT COLOR="#ffffff" STYLE="font-size:9pt;">' +
        cld[d].sYear + ' 年 ' + cld[d].sMonth + ' 月 ' + cld[d].sDay + ' 日<br>星期' + cld[d].week + '<br>' +
        '<font color="violet">农历' + (cld[d].isLeap ? '闰 ' : ' ') + cld[d].lMonth + ' 月 ' + cld[d].lDay + ' 日</font><br>' +
        '<font color="yellow">' + cld[d].cYear + '年 ' + cld[d].cMonth + '月 ' + cld[d].cDay + '日</font>' +
        '</FONT></TD></TR></TABLE>' + festival + '</TD></TR></TABLE>';

        document.all["detail"].innerHTML = s;

        if (snow == 0) {
            dStyle.left = x + offsetx - (width / 2);
            dStyle.top = y + offsety;
            dStyle.visibility = "visible";
            snow = 1;
        }
    }
}

//清除详细日期资料
function mOut() {
    if (cnt >= 1) { sw = 0; }
    if (sw == 0) { snow = 0; dStyle.visibility = "hidden"; }
    else cnt++;
}

//取得位置
function mEvn() {
    x = event.x;
    y = event.y;
    if (document.body.scrollLeft)
    { x = event.x + document.body.scrollLeft; y = event.y + document.body.scrollTop; }
    if (snow) {
        dStyle.left = x + offsetx - (width / 2);
        dStyle.top = y + offsety;
    }
}

function changeTZ() {
    //CITY.innerHTML = CLD.TZ.value.substr(6)
    //setCookie("TZ",CLD.TZ.selectedIndex)
}

function tick() {
    var today
    today = new Date()

    document.getElementById("clock").innerHTML = today.toLocaleString()
    //Clock2.innerHTML = TimeAdd(today.toGMTString(), CLD.TZ.value)
    window.setTimeout("tick()", 1000);
}

function setCookie(name, value) {
    var today = new Date()
    var expires = new Date()
    expires.setTime(today.getTime() + 1000 * 60 * 60 * 24 * 365)
    document.cookie = name + "=" + escape(value) + "; expires=" + expires.toGMTString()
}

function getCookie(Name) {
    var search = Name + "="
    if (document.cookie.length > 0) {
        offset = document.cookie.indexOf(search)
        if (offset != -1) {
            offset += search.length
            end = document.cookie.indexOf(";", offset)
            if (end == -1) end = document.cookie.length
            return unescape(document.cookie.substring(offset, end))
        }
        else return ""
    }
}

function initMonthTable() {
    var gNum, tableRow, tableCell, innerTag;
    var monthbody = document.getElementById("monthbody");

    for (i = 0; i < 6; i++) {
        tableRow = document.createElement("tr")
        tableRow.className = "monthtablecontent";
        monthbody.appendChild(tableRow);
        for (j = 0; j < 7; j++) {
            gNum = i * 7 + j;
            tableCell = document.createElement("td");
            tableCell.id = "GD" + gNum;
            tableCell.className = "daycell";
            //tableCell.setAttribute("onclick", "display(" + gNum + ")");

            innerTag = document.createElement("div");
            innerTag.id = "SD" + gNum;
            innerTag.className = "daynumber";
            tableCell.appendChild(innerTag);

            innerTag = document.createElement("div");
            innerTag.id = "LD" + gNum;
            innerTag.className = "daylunar";
            tableCell.appendChild(innerTag);

            hiddenFlagTag = document.createElement("div");
            hiddenFlagTag.id = "flag" + gNum;
            hiddenFlagTag.className = "hiddenFullDateDiv";
            tableCell.appendChild(hiddenFlagTag);

            tableRow.appendChild(tableCell);
        }
    }
}

function display(d) {
    //var dayId = "SD" + v;
    //var dayCell = document.getElementById(dayId);
    //var d = dayCell.innerText - 1;
    d = d - 1;
    cld = new calendar(currentYear, currentMonth);
    if (d !== "") {
        var year = "y";
        var month = cld[d].sMonth;
        if (month < 10) {
            month = "0" + month;
        }
        var day = cld[d].sDay;
        if (day < 10) {
            day = "0" + day;
        }

        var tmd = "d" + month + day;
        switch (cld[d].sYear % 12) {
            case 5: year = year + "2009"; break;
            case 6: year = year + "2010"; break;
            case 7: year = year + "2011"; break;
            case 8: year = year + "2012"; break;
            case 9: year = year + "2013"; break;
            case 10: year = year + "2014"; break;
            case 11: year = year + "2015"; break;
            case 0: year = year + "2016"; break;
            case 1: year = year + "2017"; break;
            case 2: year = year + "2018"; break;
            case 3: year = year + "2019"; break;
            case 4: year = year + "2020"; break;
        }
        var dayinfo = eval(year)[tmd];
        dayinfo.date = cld[d];

        // 星座
        var Constellation;
        var Constellations = new Array("白羊座", "金牛座", "双子座", "巨蟹座", "狮子座", "处女座", "天秤座", "天蝎座", "射手座", "摩羯座", "水瓶座", "双鱼座");
        if (cld[d].sMonth == 3 && cld[d].sDay >= 21 || cld[d].sMonth == 4 && cld[d].sDay <= 19) {
            Constellation = Constellations[0];
        }
        if (cld[d].sMonth == 4 && cld[d].sDay >= 20 || cld[d].sMonth == 5 && cld[d].sDay <= 20) {
            Constellation = Constellations[1];
        }
        if (cld[d].sMonth == 5 && cld[d].sDay >= 21 || cld[d].sMonth == 6 && cld[d].sDay <= 21) {
            Constellation = Constellations[2];
        }
        if (cld[d].sMonth == 6 && cld[d].sDay >= 22 || cld[d].sMonth == 7 && cld[d].sDay <= 22) {
            Constellation = Constellations[3];
        }
        if (cld[d].sMonth == 7 && cld[d].sDay >= 23 || cld[d].sMonth == 8 && cld[d].sDay <= 22) {
            Constellation = Constellations[4];
        }
        if (cld[d].sMonth == 8 && cld[d].sDay >= 23 || cld[d].sMonth == 9 && cld[d].sDay <= 22) {
            Constellation = Constellations[5];
        }
        if (cld[d].sMonth == 9 && cld[d].sDay >= 23 || cld[d].sMonth == 10 && cld[d].sDay <= 23) {
            Constellation = Constellations[6];
        }
        if (cld[d].sMonth == 10 && cld[d].sDay >= 24 || cld[d].sMonth == 11 && cld[d].sDay <= 22) {
            Constellation = Constellations[7];
        }
        if (cld[d].sMonth == 11 && cld[d].sDay >= 23 || cld[d].sMonth == 12 && cld[d].sDay <= 21) {
            Constellation = Constellations[8];
        }
        if (cld[d].sMonth == 12 && cld[d].sDay >= 22 || cld[d].sMonth == 1 && cld[d].sDay <= 19) {
            Constellation = Constellations[9];
        }
        if (cld[d].sMonth == 1 && cld[d].sDay >= 20 || cld[d].sMonth == 2 && cld[d].sDay <= 18) {
            Constellation = Constellations[10];
        }
        if (cld[d].sMonth == 2 && cld[d].sDay >= 19 || cld[d].sMonth == 3 && cld[d].sDay <= 20) {
            Constellation = Constellations[11];
        }
        dayinfo.horoscope = Constellation;
        var animals = new Array("猴", "鸡", "狗", "猪", "鼠", "牛", "虎", "兔", "龙", "蛇", "马", "羊");
        dayinfo.animal = animals[cld[d].sYear % 12];
        dayinfo.gzYear = cld[d].cYear;
        dayinfo.gzMonth = cld[d].cMonth;
        dayinfo.gzDay = cld[d].cDay;

        return dayinfo;
    }
}

function modernize(s) {
    return s;
}

function initYearMonthList() {
    for (i = 1900; i < 2050; i++) {
        AddSelectOption("yearlist", i);
    }

    for (i = 1; i < 13; i++) {
        AddSelectOption("monthlist", i);
    }
}

function AddSelectOption(selectId, text, value) {
    var elOptNew = document.createElement('option');
    elOptNew.text = text;
    var elSel = document.getElementById(selectId);

    try {
        elSel.add(elOptNew, null); // standards compliant; doesn't work in IE
    }
    catch (ex) {
        elSel.add(elOptNew); // IE only
    }
}

function YearList() {
    return document.getElementById("yearlist");
}

function MonthList() {
    return document.getElementById("monthlist");
}

function GetFullDate() {
    var fullMonth = tM + 1;
    if (fullMonth < 10) {
        fullMonth = "0" + fullMonth;
    }
    var fullday = tD;
    if (fullday < 10) {
        fullday = "0" + fullday;
    }

    var fullDate = tY + fullMonth + fullday;
    return fullDate;
}

function GetDayOfWeek() {
    var d = new Date().getDay();
    return "星期" + dayOfWeek[d];
}

function bindCellClickEvent() {
    var tds = document.getElementsByClassName("daycell");
    for (i = 0; i < tds.length; i++) {
        if (tds[i].innerText.trim() != "") {
            var dayNumber = tds[i].getElementsByClassName("daynumber")[0].innerText;
            tds[i].setAttribute("onclick", "goToDay(" + dayNumber + ")");
            //tds[i].addEventListener("click", goToDay);
        }
    }
}